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Algemeen 



Redactioneel 



Deze uitgave van de /<P Kenner is de eerste uitgave 
van de veertiende jaargang. Ja de veertiende jaar- 
gang! De KIM Gebruikersclub Nederland bestaat al 
ruim dertien jaar en is daarmee de oudste hobby- 
computerclub in Nederland. Vorig jaar waren we 
bezig met de dertiende jaargang van het blad en dat 
was te merken ook. In de eerste plaats kwam het 
blad vijf keer uit in plaats van zes keer zoals de laat- 
ste jaren gebruikelijk was. In de tweede plaats heb- 
ben we vorig jaar een tweetal ledenvergaderingen 
gehad met als doel de opheffing van de club. Welnu, 
de dertiende jaargang is voorbij en we beginnen vol 
goede moed aan een nieuwe jaargang. Ook in dit 
jaar zal het blad vijf keer uitkomen. Het blijkt name- 
lijk dat door de meeste mensen de computerhobby 
alleen gedurende de wintermaanden bedreveh 
wordt en dat de clubactiviteiten 's zomers op een vrij 
laag pitje staan. Dat kan de redactie ook merken 
aan de hoeveelheid kopij die binnenkomt. De 
stroom droogt dan vrijwel geheel op en het is zo- 
doende zeer moeilijk in juni/juli een kwalitatief goed 
blad samen te stellen. 

Veranderingen. 

In de laatste uitgave van vorig jaar is het al aange- 
kondigd, het blad zou gaan veranderen. Op cover 
van de voorgaande twee jaargangen prijkte vol trots 
een foto van de floppy-disk kaart voor DOS-65, te- 
zamen met een door Rinus Vleesch Dubois gemaak- 
te aquarel van een KIM. Het blad waar u nu in aan 
het lezen bent ziet er totaal anders uit. Dat komt 
omdat het cover van de vorige jaargang toch iets te 
prijzig was en verder vonden we het zo langzamer- 
hand weer eens tijd worden voor een nieuw uiterlijk. 
Het is de bedoeling dat dit cover in ieder geval deze 
jaargang gebruikt wordt waarbij wel iedere keer een 
andere (zwart-wit) foto of tekening gebruikt wordt. 
Het cover is ontworpen door Joost Voorhaar, een 
zeer actief mede-redactielid die niet alleen een ac- 
tief schrijver is, maar ook nog eens de hele layout 
van het blad verzorgt. Het bestuur en de redactie 
hoopt dat de nieuwe vormgeving die met het nieuwe 
cover compleet geworden is u aan kan spreken. 

Ook de inhoud van het blad is iets veranderd. In de 
eerste plaats worden bepaalde vaste rubrieken op 
een nieuwe vaste plaats afgedrukt. Dit verhaal leest 
u voortaan op pagina 4, de achterkant van de in- 
houdsopgave. Op pagina 5 staat voortaan altijd de 
uitnodiging voor de clubbijeenkomst. De informatie- 
pagina en het verhaaltje van de voorzitter zijn ver- 
huisd naar de laatste en de voorlaatste pagina van 
het binnenwerk. De drie vrije zijden van het cover 
zijn gereserveerd voor eventuele adverteerders. 



Ook de inhoud van het blad zal iets veranderen. We 
willen namelijk binnen de club een beetje een beleid 
gaan voeren waarbij we, zoals een van de bestuursle- 
den het uitdrukt, ons presenteren als een club van 
mensen die van hun eigen systeem precies weten wat 
er in de behuizing zit en weten hoe dat zo ongeveer 
(of precies!) werkt en die en passant ook nog even 
een flinke hoeveelheid geheugen in het systeem van 
de buurman bijplaatsen (en deze ook nog lid ma- 
ken?). De inhoud van het blad zal hier voor een be- 
langrijk deel bij gaan aansluiten. We zullen veel 
meer elementaire artikelen over computersystemen 
randapparatuur en chips gaan plaatsen. Deze artike- 
len zullen dan niet alleen over DOS-65 of PC gaan 
maar ook over andere systemen. Voorbeelden hier- 
van zijn de reeds gepubliceerde verhalen van Nico 
de Vries over MS-DOS, van Bram de Bruine over 
datacommunicatie en van Joost Voorhaar over 
transputers. Naluurlijk zullen we, net als we altijd al 
gedaan hebben, ook hardware blijven publiceren en 
voorlopig blijven we zowel DOS-65 als EC-65(k) on- 
dersteunen. Verder blijft er in het blad ruimte be- 
schikbaar voor software, voor welk systeem dan ook. 
Alleen ben ik van mening dat listings die langer zijn 
dan zo'n 10 pagina's eigenlijk te lang zijn omdat er 
bij dergelijke lange listings een te eenzijdig blad ont- 
staat. 

Een van de dingen die we graag in het blad zouden 
willen hebben, is een vaste brievenrubriek. Hierin 
kan de lezer zijn op- en aanmerkingen over de in- 
houd van het blad kwijt maar bijvoorbeeld ook zijn 
technische en algemene vragen. Ik wil u dus alien 
oproepen van deze service gebruik te maken. 

Ledental. 

Zoals u wel zult begrijpen, is het voor de club van 
groot belang dat we voldoende leden hebben. Als 
we te weinig leden hebben, komt er te weinig geld 
binnen en hebben we onvoldoende middelen om bij- 
voorbeeld het blad uit te kunnen geven. We willen 
dit jaar, met het nieuwe bestuur, een serieuze poging 
wagen het ledental weer te vergroten. Verder kunt 
ook u iets voor ons doen. In de eerste plaats is dat 
natuurlijk een actieve ledenwerving. Verder stellen 
we het zeer op prijs als u uw eventuele ideeen voor 
uitbreiding van het ledental bij ons bekend wilt ma- 
ken. 

Tenslotte wens ik u veel plezier met het blad en uw 
computerhobby, 

Gert van Opbroek. 
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Vereniging 



Uitnodiging clubbijeenkomst 



Datum: 17 maart 1990 
Lokatie: gebouw 't Kruispunt 
Slachthuisstraat 22 
5664 EP GELDROP 
tel: 040-857527 

Entreeprijs: /10,= 

Routebeschrijving 



Attentie 

Het is ten strengste verboden illegale kopieen te 
verspreiden. Aan personen die deze regel overtre- 
den, zal de verdere toegang tot de bijeenkomst ont- 
zegd worden. Breng alleen software mee die u legaal 
in uw bezit heeft. Het bestuur aanvaart geen enekel 
aansprakelijkheid voor de gevolgen van het in bezit 
hebben van illegale software. 



Trein: 

Geldrop is ieder half uur bereikbaar per trein (stop- 
trein Eindhoven-Weert). Vanuit het station rechts 
afslaan, de Parallelweg, dan tweede straat links, de 
Laarstraat. Aan het einde daarvan rechts afslaan en 
direct daarna weer linksaf, de Laan der vier 
Heemskinderen. Op de hoek van de eerste straat 
links, de Slachthuisstraat, vindt u het gebouw 't 
Kruispunt. 

Auto: 

Vanaf 's Hertogenbosch of Breda naar autoweg 
Eindhoven- Venlo. De eerste afslag na Eindhoven is 
Geldrop. Ga richting Geldrop, dan komt u van/elf 
op de Laan der vier Heemskinderen, dit is nl. een 
verplichte afslag naar rechts. Zie verder boven. 

Vanaf Eindhoven door het centrum van Geldrop 
richting Heeze. Na winkelstraat en daarna het 
ziekenhuis aan de rechterzijde de eerste straat links 
bij de stoplichten. Dit is de Laan der vier Heemskin- 
deren. Zie verder boven. 



Programma: 




met koffie 



10:30 Demonstratie door A. vd Hombergh van 
CP/M op de EC-65k, Voordracht door T. 
Smits over de grafische kaart van Elektuur 
met 9365 processor en demonstratie van 
grafische software op de EC-65. 

11:30 Forum en markt 

12:00 Lunchpauze 

Aansluitend het informele gedeelte bedoeld om 
kennis, ervaring Public Domain en eigen ontwikkel- 
de software uit te wisselen met uw medeleden. 
Breng daarom ook uw systeem mee. 



NUENEN 



17:00 Sluiting. 
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Fundamenten 



Transputers II 



Bouwstenen van de toekomst 

Vorige keer hebben we heel erg globaal naar de 
transputer kunnen kijken. Deze aflevering gaat die- 
per in op de fysieke aspecten van deze opvallende 
bouwsteen. De processor, de links en de event logi- 
ca wordt aan een nader onderzoek onderworpen. 
Om een en ander wat beter in de herinnering te ha- 
len heb ik hier het schematisch overzicht van de 
T414 nog maar eens herhaald. 

We be ginnen links boven in de hoek, bij de proces- 
sor. Zoals ik vorige keer al schreef bestaat de pro- 
cessor grofweg uit een zestal registers. Dat zijn de 
instruction-pointer, de workspace-pointer, een spe- 
ciaal operand register en de drie rekenregisters, ge- 
nummerd A t/m C. De workspacepointer wijst een 
stuk geheugen aan waarin de transputer op dat mo- 
ment aan het werk is. De process scheduler ver- 
plaatst deze pointer eenvoudigweg naar een ander 
stuk geheugen, waardoor de transputer razendsnel 
kan schakelen tussen verschillende processen. 



32-bit 
RISC 
processor 



2 kByte 
50 nsec 
static 
RAM 



interface 



System 
services 



Link #1 



Link #2 



Link #3 



Link #4 



Event 



Fig. 4: De T414 van INMOS 

De instructionpointer wijst naar een stuk geheugen 
waarin de instructies opgeslagen staan. Dit geheu- 
gen is slechts acht bits breed. De inhoud van ieder 
byte is onder te verdelen in twee functioned van el- 
kaar verschillende nibbles. Het ene nibble bevat de 
instructie, het andere bevat data. Dat lijkt verdacht 
veel op een rasechte vier-bitter. De truuk is echter 
deze: de transputer haalt een byte op. Het hoogste 
nibble is de instructie, de laagste is de operand. 
Deze operand wordt in het operand register ge- 
plaatst en de instructie wordt uitgevoerd. Als het 

: instructies is, is het ver- 



Workspace 



A-Register 



B-Register 



C-Register 



Workspace register 



Instrucion pointer 



Operand register 



Instructions 



Fig. 5: Werking van work- en instruction pointer 

haal hier af. De instructie wordt dan direcct uitge- 
voerd. Er zijn echter een drietal speciale instructies 
beschikbaar. Deze instructies maken de rest van de 
instructieset beschikbaar. Het gaat hier om de in- 
structies "Prefix" (mnemonisch "Pfix"), "Negetive 
prefix" (Nfix) en "Operate" (Opr). De prefix in- 
structie laadt de operand in het operand register en 
schuift de inhoud van het register vervolgens een 
nibble naar links. De nfix instructie doet hetzelfde, 
maar inverteert de operand eerst. Normaliter wordt 
na het uitvoeren van een instructie het operand re- 
gister leeg gemaakt. In het geval van de pfix- en nfix 
instructies gebeurt dat niet. De opr instructie laadt 
dan het volgende nibble en voert daarna de instruc- 
tie uit die door het operand register aangewezen 
wordt. 

Een voorbeeld zal de zaak wel vergemakkelijken. 
We nemen de instructie "Long Add" (Ladd). Deze 
instructie telt de waarden die in de rekenregisters A 
en B staan bij elkaar op en plaatst het resultaat in 
het A-register. De instructie heeft instructie code 
16h. Dit wordt door de assembler van de transputer 
omgezet in "Pfix #1" en "Opr 6". De resulterende 
code voor deze instructie wordt dan ook 21F6h. (2X 
is de code voor Pfix, FX is de code voor Opr). Op 
deze manier kunnen we drie verschillende soorten 
instructies onderscheiden. Allereerst dus de 13 stan- 
daard-instructies. Dit zijn de meest gebruikte in- 
structies in de meeste processoren. Ze beslaan een 
nibble voor de code en hebben een operand van ook 
weer een nibble. 
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Dan is er een groep waarbij de operand deel uit- 
maakt van de code. Deze groep begint altijd met 
"Opr". Alle instructies uit deze tweede groep zijn 
impliciet en beslaan twee nibbles. De instructie "In" 
(input message from link) is een voorbeeld van zo'n 
instructie. De code voor deze instructie is 07, het- 
geen gecodeerd wordt door "Opr 7", zonder vooraf- 
gaande prefix-instructies. Instructies uit de derde 
groep beslaan twee bytes per instructie; een byte 
prefix-instructie en een byte operate instructie. 

De pfix- en nfix instructies worden ook gebruikt 
voor het laden van 32-bits constanten op de reken- 
stack. Een constante "535h" wordt op de stack gezet 
door de twee pfix-instructies en een load constant 
instructie... 

In praktische toepassingen wordt deze puzzel geluk- 
kig overgenomen door de compiler en/of assembler. 
Het zou ondoenlijk zijn voor een mens om bij iedere 
optelling of vermenigvuldiging steeds een hoop pre- 
fix- en nfix-instructies te moeten gebruiken om een 
constante term te definieren... 




J 



□ 



Fig. 6: Boomstructuur met host computer 

Maar goed, terug naar de echt fysieke aspecten van 
de transputer. Laten we eens kijken naar de links. 
Zoals ik in de vorige aflevering al schreef is een link 



een razendsnelle seriele verbinding met de buiten- 
wereld. De transputer kan messages over de link 
naar buiten sturen via speciaal daarvoor gereser- 
veerde instructies. De snelheden van de links wor- 
den worden hardwarematig vastgelegd door middel 
van een drietal aansluitingen. Deze aansluitingen 
dragen de namen "Link special", "LinkO special" en 
"Linkl23 special". De ware hardware freak zal hier 
onmiddelijk uit concluderen dat er twee pennen no- 
dig zijn om link #1 in te stellen en dat er een pen 
("Link special") gecombineerd wordt met de 
"Linkl23 special" om de snelheid van de andere 
drie links in te kunnen stellen. De waarheidstabel 
(mooi woord he...) ziet er als volgt uit: 

Link LinkO MBit/sec Data rate 
Special Special (kbyte/sec) 

0 0 10 400 

0 1 5 200 

1 0 10 400 
1 1 20 800 

Voor de links 1, 2 en 3 gelden dezelfde waarden, al- 
leen dan wel i.p.v. "LinkO Special" de pen "Linkl23 
Special". De snelheden van de links 1, 2 en 3 zijn 
dus niet onafhankelijk van elkaar te regelen. IN- 
MOS heeft alle alle externe devices geschikt ge- 
maakt voor 10 Mbit/sec. In een typische 
boomstructuur (zie fig. 3) wordt link #0 van de 
root-transputer ingesteld op de maximale snelheid 
die door de host-computer nog gehaald kan worden. 
De andere drie links zijn verbonden met andere 
transputers en kunnen dus op de hoogst mogelijke 
snelheid ingesteld zijn. Die andere drie transputers 
zijn aan de root-transputer gekoppeld met hun link 
#0. Deze kan dan dus ook weer zo snel mogelijk in- 
gesteld worden. De devices die eventueel aan de an- 
dere links hangen kunnen dan op een lagere 
snelheid aangestuurd worden. 

Sja, dit besluit het tweede deel in de serie over dit 
wonderbaarlijke zwarte doosje. Volgende keer meer 
over de werking van de process-scheduler en een 
kleine vergelijking met andere systemen. 

Joost Voorhaar. 



De//P Kenner, no. 65 (februari '90) 



www.dottyflowers.com 



Talen/Software 



Ontbinden in factoren (tevens priemonderzoek) 



Het volgende (Turbopascal-) programma geeft de 
ontbinding in priemfactoren van getallen beneden 
een bepaalde waarde. Door niet alle oneven getallen 
te testen en hieruit de 3-vouden te elimineren wordt 
het programma ca 30% sneller. Dit wordt bereikt 
door afwisselend de delers met 2 en 4 te verhogen. 



In de while-lus is toegevoegd 'AND deler < 46341, 
want deler * deler is dan groter dan maxlongint 
( = 2 31 -1), waardoor er geen juist stopcriterium voor 
priemgetallen tussen 46340 2 en maxlongint is, terwijl 
de oplossing 'deler < = (maxlongint DIV deler)' 
het programma ca 50% langzamer maakt. 

A.P.Oerlemans 



PROGRAM ontbinden(input,output); 

VAR faktor,deeltal, 

deler,getal : longint; 

meer,i,exponent : integer; 

factor : ARRAY[1..10,0..1] of longint; 

FUNCTION spaties(waarde : longint) : string ; 
CONST spatie = ' 
VAR lengte : integer; 
woord: string[ 10|; 

BEGIN 

str(waarde,woord); 
lengte : = length(woord); 
spaties : = copy(spatie,l,lengte); 
END; {spaties} 

PROCEDURE BepaalFactor(faktor : longint); 
BEGIN 

IF (deeltal modfaktor)=0 
THEN BEGIN 

exponent : = 1; 
factor[i,0] : = faktor; 
WHILE (deeltal MOD faktor) = 0 DO 
BEGIN 

deeltal : = deeltal DIV faktor; 
factor[i,l] : = exponent; 
exponent : = exponent + 1 

END; 
i:= i + 1; 

END; 

IF deeltal < > 1 
THEN BEGIN 

factor[i,0] : = deeltal; 

factor[i,l] := 1 

END; 

END; { BepaalFactor } 

PROCEDURE uitvoer; 

VAR grondtal,exponent : string[40]; 
hulpfactor,hulpexp: string[12]; 
m : integer; 

BEGIN 

str(getal,grondtal); 
grondtal : = grondtal +' == '; 
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exponent : = spaties(getal) + ' 
m : = 1; 

WHILE factor[m,0] <> 0 DO 



str(factor[m,0],hulpfactor); 
str(factor[m,l],hulpexp); 
IFfactor[m,l] > 1 
THEN BEGIN 

grondtal : = grondtal + hulpfactor + spaties(factor[m,l]) + '.'; 

exponent : = exponent + spaties(factor[m,0]) + hulpexp + ' ' 
END ELSE 
BEGIN 

grondtal : = grondtal + hulpfactor + '.'; 
exponent : = exponent + spaties(factor[m,0]) + ' ' 

END; 

m : = m + 1; 

END; 
writeln; 

writeln(' ',exponent); 
write('De gevraagde ontbinding is: '); 
writeln(copy(grondtal,l,length(grondtal) - 1)); 
END; { Uitvoer } 

BEGIN { HOOFDDEEL } 

for i : = 1 TO 10 DO writeln; 
writeln(' ONTBINDEN'); 
writelnC IN FACTOREN'); 

for i : = 1 to 10 DO writeln; 

writeln('Dit programma geeft de ontbinding van een getal dat '); 

writeln('moet inliggen tussen 3 en ',maxlongint,'.'); 

writeln; 

write('Voer het getal in (een getal < 4 stopt het programma) '); 

readln(getal); 

deeltal : = getal; 

WHILE deeltal > 3 DO 

BEGIN 

for i : = 1 to 10 DO factor[i,0] : = 0; 

i:= 1; 

writeln; 

BepaalFactor(2); 
BepaalFactor(3); 
meer : = 4; 
deler : = 5; 

WHILE (deler * deler < = deeltal) AND (deler < 46341) DO 
BEGIN 

BepaalFactor(deler); 

meer : = 6 - meer; 

deler : = deler + meer; 

END; 

IF i = 1 THEN writeln('Het getal is een priemgetal') 

ELSE uitvoer; 

writeln; 

write('Voer het getal in (een getal < 4 stopt het programma) '); 
readln(getal); 



END; 

END. 
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Moderne datacommunicatie 



Het is nog niet eens zo lang geleden dat ik een mo- 
dem kocht. eigenlijk is dat zelfs nog maar een half 
jaartje terug. In die korte tijd ben ik behoorlijk ver- 
slingerd geraakt aan de nieuwe Verslaving: data- 
communicatie. Verslaving ja, met een hoofdletter V. 
Mijn huisgenoot denkt er zelfs over om, als hij te- 
ruggekeerd is uit Amerika, een modem te kopen. En 
dan moet er ook maar een computer bij komen... 

Wat is er nu zo leuk aan datacommunicatie? Tsja, 
het antwoord op die vraag is niet simpel te geven. Je 
zou kunnen zeggen dat het een vrij anonieme manier 
is om met anderen in contact te treden. Daardoor 
krijgt de gemiddelde conferentie al heel snel een 
toon van "ouwe jongens krentebrood". Het formed 
bedoelde "u" heeft in de datacommunicatie vrijwel 
overal plaats moeten maken voor het veel kame- 
raadschappelijker "je", om 
maar eens wat te noemen. 
Daar komt dan nog bij dat de 
vooroordelen die je ten op- 
zichte van een persoon zou 
kunnen hebben op grond van 
uiterlijk en/of accent niet be- 
staan in deze vorm van com- 
municatie. 



Maar goed, genoeg over de 
voor- en nadelen van deze mo- 
derne communicatiemethode. 
Dit artikel gaat over de techni- 
sche aspecten van bulletin 
boards en electronische post. 
We beginnen bij het bulletin 
board, het medium waar vrij- 
wel iedere modemgebruiker begonnen is... 

Bulletin boards zijn er in soorten en maten. Er zijn 
verschillende standaard programma's waarmee je 
een bulletin board kunt opzetten. Een van de popu- 
lairste programma's (en zeker ook mijn favoriet) is 
het programma dat ook gebruikt werd voor het bul- 
letin board van de vereniging: QuickBBS. QuickBBS 
laat de SysOp toe een heel eigen gezicht aan zijn 
bulletin board te geven doordat er maar weinig 
menu's van te voren in het programma vastgelegd 
zijn. Een heel goede cloon van dit programma is het 
gloednieuwe "Remote Access" (afgekort tot "RA"). 
RA is volledig compatible met QuickBBS versie 2.61 
(de meest recente versie), maar is sterk verbeterd in 
het multitasking gebeuren. Een ideale vervanger dus 
voor bulletin boards die graag met meer dan een te- 
lefoonlijn willen gaan werken. 

"Maar, hoe gaat nou een telefoonsessie in zijn 
werk?", zult u wellicht vragen. Wat u allereerst no- 



In die korte tijd ben ik 
behoorlijk verslingerd 
geraakt aan de nieuwe 
Verslaving: 
datacommunicatie. 
Verslaving ja, met een 
hoofdletter V. 



dig hebt om contact te kunnen leggen met een bulle- 
tin board heeft u natuurlijk een computer, een mo- 
dem en een terminal programma nodig. Heel 
populair is het telecommunicatie pakket "Telix", 
een shareware programma met bijzonder veel goede 
features. Telix zal ik volgende keer bespreken in de 
shareware rubriek van de /<PKenner, dus een pre- 
ciese beschrijving laat ik hier achterwege. De com- 
puter belt voor u het bulletin board en, na wat 
aftasten van snelheden e.d. krijgt u contact met het 
bulletin board. Meestal ziet u dan eerst een bood- 
schap in de trant van "FrontDoor 1.99b; non com- 
mercial version" en "Hit escape twice for 
QuickBBS". Het programma FrontDoor (Neder- 
lands: "voordeur") is een zogeheten mailer. Op de 
preciese functie van die mailer komen we straks nog 
terug; we taffen nu gewoon even twee maal op de es- 
cape-toets en... tataa! Het duurt 
even, maar daar is het bulletin 
board al! Even uw naam invullen 
en, als het de eerste keer is (of 
als u minstens een x aantal dagen 
niet meer ingelogd hebt), een 
hele reeks aan vragen. Deze vra- 
gen worden voor een deel door 
het systeem zelf gesteld om opti- 
maal te kunnen werken met uw 
configuratie en voor een ander 
deel zijn het vragen om gegevens 
die door de SysOp nodig geacht 
worden voor het checken van uw 
identiteit. Deze vragen worden 
vaak ook nog gebruikt om het 
bulletin board zo goed mogelijk 
aan te laten sluiten bij de wensen 
van de bellers. Ze blijven in ieder geval strikt prive, 
ze worden nooit verkocht, verhuurd of weggegeven 
aan anderen! 

Heeft u de vragenlijst ingevuld, dan komt u in het 
bulletin board (afgekort tot "BBS") zelf terecht. 
Soms verschijnen er eerst nog allerlei teksten op uw 
scherm met nieuws over het BBS of over andere 
BBS-en. U komt dan terecht in een hoofdmenu 
waar u kunt kiezen wat u nou precies wil gaan doen. 
Zo kunt u bijvoorbeeld post gaan lezen en schrijven 
of bestanden gaan versturen ("uploaden") en ont- 
vangen ("downloaden"). Meestal zijn er op het BBS 
ook verschillende teksten terug te vinden over van 
alles en nog wat (de bulletins) en een keur aan ver- 
schillende andere programmas's op te starten. 

De belangrijkste functie van een BBS is en blijft ech- 
ter de mogelijkheid tot electronische uitwisseling 
van post. In grote trekken zijn er twee soorten post: 
lokale post en de z.g. "echomail". Zoals de naam al 



10 



De/<P Kenner, no. 65 (februari '90) 



www.dottyflowers.com 



Communicatie 



doet vermoeden blijft lokale post op het bulletin 
board. Echomail daarentegen gaat ook naar een 
hele hoop andere bulletin boards, 's Nachts bundelt 
het systeem dat aangesloten is op de echomail (een 
"node" in BBS terminologie) alle post die voor de 
echomail bestemd is tot een pakket. Dat pakket 
wordt 's nachts verstuurd en kan op die manier de 
volgende dag al op plaats van bestemming zijn (goh, 
lijkt de P.T.T. wel...). Echomail is vrijwel altijd "pu- 
blic" post. Dat wil zeggen dat anderen op een sys- 
teem waar dat bericht aankomt dat bericht ook 
kunnen lezen. Ook al is het bericht niet aan hun ge- 
adresseerd! Echomail is de ideale manier om vragen 
te stellen aan iedereen die wellicht de kennis en/of 
zin heeft om u te helpen met een probleem. 

Naast echomail is er ook nog netmail. Netmail ver- 
schilt van echomail op een aantal punten. In de eer- 
ste plaats is netmail meestal private. Dat wil dus 
zeggen dat alleen de geadresseerde het bericht kan 
lezen (en de SysOp's van de boards via welke het 
bericht getransporteerd wordt!). Netmail gaat ook 
niet naar alle andere aangesloten systemen, zoals 
echomail, maar wordt zo direct mogelijk naar het 
geadresseerde systeem gezonden. Meestal koml het 
er op neer dat het BBS waar het bericht gepost 
werd, 's nacht direct het BBS van de geadresseerde 
belt. Daarom is netmail meestal niet gratis! 

Mensen die erg veel post versturen, kunnen dat op 
een snellere manier doen; ze kunnen "point" wor- 
den. Een point heeft, net als het BBS, een mailer. 
Overdag kan iemand die point is zijn berichten in- 
tikken op zijn eigen systeem. 's Nachts wordt dan 
automatisch het systeem gebeld waar men de point- 
aansluiting heeft aangevraagd. De twee mailers wis- 
selen dan heel snel de berichten met elkaar uit en... 
er hoeft geen mens meer bij te zijn! De communica- 
tie tussen een point en zijn "boss" (de node waar 
de post naar toe stuurt) lijkt erg veel op de 



communicatie tussen twee nodes onderling. Het 
grootste verschil is echter wel dat een point ook be- 
standen met zijn boss kan uitwisselen; iets dat 
meestal niet gebeurt tijdens een echomail contact 
tussen twee nodes. Daarnaast kan een point ook in 
de lokale postgebieden post uitwisselen. 

Er is al enige tijd een pakketje in omloop waarmee 
men een soort pointsysteem kan opzetten. Met be- 
hulp van dat pakket (het "eXpress Response Sys- 
tem", oftwel "XRS") kan men post op het BBS 
selecteren, laten inpakken en downloaden. De zo 
ontvangen post kan dan thuis in de luie stoel door- 
gelezen en beantwoord worden, bijna net zo als een 
point dat doet. De antwoorden worden dan weer ge- 
bundeld, en de XRS-gebruiker kan het pakket tij- 
dens een volgende BBS-sessie gewoon weer 
verzenden aan het BBS. De verschillen tussen een 
echte point en een dergelijke "fake-point" zijn, dat 
de XRS-gebruiker iedere keer toch weer het BBS in 
moet om de post uit te wisselen. Daarnaast wordt de 
post online gepackt, wat wel eens een minuut of drie 
a vier kan duren. Een point hoeft het BBS helemaal 
niet meer in om zijn post af te leveren en nieuwe op 
te halen. Tevens staat de post op het BBS-systeem al 
klaar als hij belt; er hoeft dus niet on-line post gese- 
lecteerd en gebundeld te worden. Dit zijn slechts 
een paar van de voordelen die een point heeft t.o.v. 
een "normale" BBS-er. 

Moderne datacommunicatie kan dus veel meer be- 
tekenen dan een moeizame manier om aan goedko- 
pe software te komen. Heeft u (nog) geen modem? 
Wellicht is het dan een goed idee de aanschaf van 
een goed modem te overwegen. Een redelijk goed 
modem hoeft niet veel te kosten en... je hebt er veel 
plezier van. 

Joost Voorhaar 



Ik heb interesse in de KGN en wil 



ED Lid worden van de KGN 



IZ1 Meer informatie over de KGN 



Naam 








aan het secretariaat van: 



Handtekening : 



KIM Gebruikersclub Nederland, 
Davidvosstraat 29, 
1063 HV Amsterdam. 
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Programeren in Assembler voor DOS-65 (deel 5) 



Na een korte periode van afwezigheid (mijn fans 
zullen tevergeefs gezocht hebben naar deel 5 in 'de 
//PKenner' nr. 64) heeft mijn psychiater weer het 
groene licht gegeven voor wederom een literair 
hoogstandje, kortom lieve lezers en vooral lezeres- 
sen, deel 5! Maar eerst... 

Voordat U kunt gaan genotteren, even een korte te- 
rugblik op deel 4. Bij mijn exemplaar van nr.63 was 
in de tekst op pagina 12, de assembler text niet vol- 
ledig. Er stond tweemaal BNE DLOOP, voor de 
goede orde dit moet zijn: 

BNE DLOOP2 

DEX 

BNE DLOOP1 

Ook had ik gevraagd om het programma zo te wijzi- 
gen dat de letter precies lOx zou knipperen en dan 
terugkeert naar MON of DOS. Welnu, het zal een 
ieder duidelijk zijn dat we voor deze truuk een teller 
nodig hebben. Verder zal die JMP FLASH eruit 
moeten, want deze, zoals de Franscn zeggen, 
'unconditional jump' springt immers ALTIJD. Wat 
wij nodig hebben is een 'conditional jump', kortom 
een spring-in-het-veld die verder kijkt dan z'n binai- 
re neus lang is. Maar 'quelle malheur', zoals de En- 
gelsen zeggen, zo'n conditonele jump heeft de 6502 
niet aan boord. Gelukkig heeft ie wel conditionele 
branches, een aantal hebben we al gezien (BCC, 
BCS, BNE en BEQ). Die branches hebben als na- 
deel (zie deel 2) dat ze een beperkt bereik hebben 
van -128 tot + 127 geheugenlocaties. Maar voor het 
EOR DEMO programma is dat ruimschoots vol- 
doende. Zo'n conditionele branch verlengen tot een 
conditionele jump is overigens een piece of cake, zo- 
als de Fransen zo treffend weten te zeggen, kijk 
maar: 

BNE NOGO 
JMP GO 
NOGO ... 

En zie daar, een conditionele jump en wel van het 
type JEQ (Jump if EQual). Maar goed terug naar 
ons FLASH probleem, wat we moeten maken is een 
conditionele jump die alleen springt als de loop tel- 
ler nog niet klaar is met zijn 10 rondjes knipperen. 
Zoals ik al had gewaarschuwd kunnen we de X of Y 
registers niet gebruiken omdat die al in gebruik zijn 
in de DELAY subroutine. Natuurlijk kun je X of Y 
eerst bewaren in een geheugenlocatie: 

; begin van EOR_ 

DEMO (zie deel 4) 
LDX #20 ; lOx knipperen = 

20 x EOR!! 

FLASH LDA ... ; zie deel 4 



STX XSAVE ; bewaar loop teller X 
JSR DELAY ; effe wachten, anders 

gaat het te snel.. 
LDX XSAVE ; loop teller ophalen 
DEX ; teller = teller - 1 

BNE FLASH ; als NIET nul, doorgaan! 
RTS ; anders terug naar MON 

of DOS 

XSAVE FCCO ; geheugenlocatie om X 

tijdelijk te bewaren 

Natuurlijk zijn er legio andere mogelijkheden, bij- 
voorbeeld een geheugen (b.v. op de zero-page) loca- 
tie gebruiken als TELLER, dit heeft als voordeel 
dat we X niet hoeven te 'saven'. Gebruik dan LDA 
#20, STA TELLER als initia- lisatie en DEC TEL- 
LER voor de conditionele branch. Ook kun je de 
teller laten optellen vanaf 0 en dan CMP, CPX of 
CPY (resp. bij gebruik van een geheugen locatie, in- 
dex register X of index register Y als teller) gebrui- 
ken om te kijken of je al klaar bent. Dit laatste heeft 
als nadeel dat het programma twee bytes langer 
wordt, door aftellen te gebruiken maak je namelijk 
handig gebruik van het feit dat de Z-flag automa- 
tisch gezet wordt als je teller de 0 bereikt. Gebruik 
je optellen, dan heb je de CMP instructie nodig om 
de Z-flag te zetten. Vraagje, waarom is het (dus) on- 
zin om CMP #0 te gebruiken? 

De adresseer mogelijkheden 

In dit deel gaan we (eindelijk) eens kijken naar de 
adresseer mogelijkheden van ons wonderdoosje. 
Vooral in het begin duizelt het de machinetaal pro- 
grammeur van de vele mogelijkheden op dat gebied 
en welke kun je nu het beste gebruiken en waarom? 
Alleree"' »»« — A " wft 
taal 13 i 

1. Implied 

2. Accumulator 

3. Absolute 

4. Zero Page 

5. Immediate 

6. Absolute, X 

7. Absolute,Y 

8. Zero Page,X 

9. Zero Page.Y 

10. Relative 

11. Indirect 

12. Indexed Indirect 

13. Indirect Indexed 

1. Implied 

Bij inslructies van dit type ligt het adres van de data 
besloten in de opcode zelf of het zijn instructies die 
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verder geen data nodig hebben (bijv. NOP). Bij de 
6502 zijn dat de instructies BRK, CLC, CLD, CLI, 
CLV, DEX, DEY, INX, INY, NOP, PHA, PHP, 
PLA, PLP, RTS, RTI, SEC, SED, SEI, TAX, TAY, 
TSX, TXA, TXS en TYA (hijg, hijg). Een aantal 
van deze instructies hebben we al gebruikt in de 
voorbeelden, een fijnere onderverdeling zou kunnen 
zijn: 

a. instructies voor controle van status register bitjes: 

CLC, CLD, CLI, CLV, SEC, SED, SEI 

b. instructies voor data transfer tussen registers on- 
derling: 

TAX, TAY, TSX, TXA, TXS, TYA 

c. instructies voor stack operaties: 

PHA, PHP, PLA, PLP, RTS, RTI 

d. instructies voor de index registers X en Y: 

DEX, DEY, INX, INY 

e. overig: 

BRK, NOP 

Alle implied opcodes zijn slechts een byte lang. De 
AS syntax is simpel, eenvoudig de 3 karakters voor 
de opcode intypen en klaar is Clara! 

Voorbeeld: 
Instructie Memory 
NOP EA 

2. Accumulator 

Deze adresseer mogelijkheid is eigenlijk ook Imp- 
lied, namelijk instructies waarbij in de opcode zelf al 
vastligt dat ze betrekking hebben op de accu. Bij de 
6502 zijn dat er maar vier: 

a. ALU bewerkingen: 

ASLA, LSRA, ROLA en RORA. 
Allemaal schuifoperaties (zie deel 3) die werken 
met de inhoud van de accu en daar ook het resultaat 
weer in terugzetten. Ook deze instructies zijn een 
byte lang. De AS syntax is uitgebreid met een A ach- 
ter de instructie. Sommige assemblers gebruiken 
ook wel ASL-A of ASL A. Het onderscheid tussen 
ASL A en ASL $A is dan echter wat moeilijk (voor 
de lezer, NIET voor de assembler). 



Voorbeeld: 
Instructie 
ASLA 



Memory 
OA 



3. Absolute 

Bij deze methode wordt het adres volledig beschre- 
ven in twee bytes die volgen op de opcode. De post- 
bode van de processor weet dus precies waar ie 
moet wezen want zoals we al zagen in deel 1, de 
6502 heeft een adres bereik van 64K en met 16 bits 
kun je een enkel adres precies beschrijven. De abso- 
lute methode wordt gebruikt bij: 



a. ALU bewerkingen: 

ADC, AND, ASL, BIT, CMP, CPX, CPY, 
EOR, INC, DEC, LSR, ORA, ROL, ROR, en 
SBC 

b. Registers laden en schrijven: 

LDA, LDX, LDY, ST A, STX en STY 

c. Programma flow i 

JMP en JSR 

De absolute instructies zijn altijd 3 bytes lang, t.w. 
dc opcode en 2 bytes voor het adres. Zoals we al we- 
ten staat het LSB (Least Significant Byte) van het 
adres in de eerste geheugenlocatie, en het MSB 
(Most Significant Byte) in de daaropvolgende (zie 
ook deel 1). De syntax voor de AS assembler is eerst 
de instructie en vervolgens een 16 bits getal of een 
label. 



Voorbeeld: 
instructie 
LDA $1234 



Memory 
AD 34 12 



4. Zero Page 

Bij deze methode 'weet' de processor (door de op- 
code) dat het adres op de eerste pagina van het ge- 
heugen staat, zoals we al gezien hebben zijn pagina's 
precies 256 bytes groot en dus heeft de postbode 
aan een enkel byte genoeg. Je zou kunnen zeggen 
dat Zero Page adresering een soort wijkpost is ter- 
wijl de Absolute adresering voor de hele stad met 
65535 inwoners te gebruiken is. De Zero Page me- 
thode is bij precies dezelfde instructies als hierbo- 
ven bij de Abslotute methode is beschreven. Met 
uitzondering van de JSR en de JMP instructie. Het 
voordeel van de Zero Page methode is dat het pro- 
gramma sneller wordt, je kunt met je boerenver- 
stand aanvoelen dat de processor minder werkt 
heeft aan het ophalen van de instructie (een byte 
korter). Nadeel is dat bij bijna alle 6502 systemen 
een gedeelte van de Zero Page al in gebruik is bij de 
systeem software zodat niet alle locaties in jouw flit- 
sende programma gebruikt mogen worden. Bij het 
DOS65 systeem valt dat gelukkig allemaal mee, om- 
dat hier de systeem software immers voor een groot 
gedeelte zelf in RAM staat zijn er heel weinig loca- 
ties van de Zero Page in gebruik. Voor zover ik weet 
zijn dat adres 0..3 (PTA en PTB) die (tijdelijk) in 
gebruik zijn in 1065 (de data in die locaties wordt 
overigens wel netjes opgeslagen en later terug gezet, 
zodat je bij normaal gebruik deze locaties best kunt 
gebruiken, bij programma's die veel interrupts ge- 
bruiken is het oppassen geblazen). Verder worden 
de adressen $FB, $FC, $FE en $FF (tijdelijk) ge- 
bruikt tijdens het 'booten' van het systeem. (klopt 
dat Erwin?). De Zero Page instructies zijn alle 2 by- 
tes lang. De syntax voor AS is net als bij Absolute al- 
leen moet het adres maar 8 bits zijn of het label 
moet verwijzen naar de zero page. 



Deftf Kenner, no. 65 (februari '90) 



13 



www.dottyflower5.com 



Systemen 



Voorbeeld: 
Instructie 
STA $12 



Memory 
8512 



5. Immediate 

Dit is de meest directe vorm om iets aan de proces- 
sor door te geven, de te gebruiken data staat name- 
lijk direct op de volgende geheugenlocatie na de 
opcode. Er hoeft dus geen postbode door weer en 
wind gestuurd te worden om ergens in de binnenlan- 
den van Borne Bokkie een pakketje data op te gaan 
halen. Je zou verwachten dat deze methode ook toe- 
gepast zou kunnen worden bij alle ALU bewerkin- 
gen, maar een aantal van die bewerkingen zijn 
zogenaamde Read-Modify- Write instructies. Dat is 
Frans voor: data lezen, doe er iets mee en zet vervol- 
gens het resuitaat weer terug waar je het gevonden 
hebt. Het is duidelijk dat deze operaties niet echt 
bruikbaar zijn bij de immediate instructie, immers 
iedere keer dat je programma zou starten zou er een 
ander getal achter de opcode (kunnen) staan. Kor- 
tom: de immediate methode wordt alleen gebruikt 
waarbij een getal gelezen wordt, nooit voor schrij- 
foperaties. Over blijven dus die ALU bewerkingen 
waarbij alleen data gelezen wordt en het resuitaat 
alleen in de Accu komt te staan. 

a. ALU bewerkingen: 

ADC, AND, CMP, CPX, CPY, EOR, ORA 
en SBC 

b. Register laden: 

LDA, LDX en LDY 
De immediate instructies zijn altijd 2 bytes lang. De 
syntax voor AS is eerst de instructie, vervolgens een 
# karakter en dan de 8 bits data of een EQU Qa, 
ook van 8 bits ja!). 



Voorbeeld: 
Instructie 
AND #$AA 



Memory 
29 AA 



Accu 



Adres 



Offset X 



6. Absolute,X 

Deze methode heet ook wel 'indexed adressing', het 
adres wordt namelijk berekend door bij het 16 bits 
absolute adres het index register X op te tellen. De 
postbode krijgt dus een adres door, fietst ermee 
naar vriend X, krijgt daar zijn offset, zoals de Fran- 
sen zeggen, gebruikt vervolgens z'n zakjapanner en 
weet dan pas waar ie naar toe moet met zijn door 
hogerhand verstrekte dienstvoertuig. Deze methode 
is heel handig als je de postbode een tabel wilt laten 
doorfietsen, in de instructie staat dan het beginadres 
van de tabel en het index register X doet de rest. Je 
ziet dat X register kan heel wat meer dan een simpel 
tellertje. In figuur 1 is dit schematisch weergegeven. 



Deze methode kan gebruikt worden bij bijna alle in- 
structies die ook bij de standaard Absolute methode 
genoemd worden, behalve die instructies die betrek- 
king hebben op het index register X zelf CPX, LDX 
en STX (kan ik nog begrijpen), de JMP en JSR (kan 
ik ook nog begrijpen) maar ook op de instructies 
BIT, CPY en STY (en daar begrijp ik geen hout van, 
waarom wel LDY en geen CPY of STY meneer 
Rockwell?). Over blijven dus: 

a. ALU instructies: 

ADC, AND, ASL, CMP, DEC, EOR, INC, 
LSR, ORA, ROL, ROR en SBC. 

b. Registers laden en schrijven: 

LDA, LDY en STA 
De instructie lengte is altijd 3 bytes. De syntax voor 
AS is precies hetzelfde als bij de Absolute methode 
alleen wordt de operand nu gevolgd door een kom- 
ma en een X (of x). 



Voorbeeld: 
Instructie 
STA TABEL,X 



Memory 

9D 00 20 (dus TABEL 
begint op $2000) 



7. Absolute,Y 

Nou zul je zeggen, die kennen we al. I.p.v. naar X te 
fietsen, fietst onze postbode nu eerst langs Y alvo- 
rens zijn zakjapanner te voorschijn te halen. Inder- 
daad, beste lezer (en lieve lezeres) U heeft 
volkomen gelijk! In figuur 2 is deze adresseermetho- 
de schematisch weergegeven. 



Data — * 



Fig. 1: LDA,X 
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Voorbeeld: 
Instructie 
STY 50,X 



Memory 
94 50 




9. Zero Page,Y 

Deze hoef ik niet meer uit te leggen, dacht ik zo. 
Ook hier heeft meneer Rockwell weer drastisch be- 
Offset Y zuinigd want bij deze adresseermethode zijn nog 

slechts twee instructies overgebleven, namelijk LDX 
en STX. En dat is best wel vervelend soms, je kunt 
de Accu in de Zero Page dus alleen via X op de ver- 
korte manier (2 bytes) laden e.d. via Y heb je dan 
gelijk Absolute,Y dus 3 bytes nodig. De instructie- 
lengte is 2 bytes, de AS syntax is weer idem als bij 
Zero Page,X door de X te vervangen met een Y. 



Fig. 2: LDA,Y 

Dus alle instructies die bij Absolute,X gebruikt wor- 
den kan ik ook bij Absolute,Y gebruiken? Neen, be- 
ste lezer (en lieve lezeres) nu heeft U het mis. 
Meneer Rockwell heeft in zijn oneindige wijsheid 
beslist dat het niet nodig is om alle instructies zowel 
in Absolute,X als in Absolute,Y uit te voeren. Wat 
er over blijft is: 

a. ALU instructies: 

ADC, AND, CMP, EOR, ORA en SBC 

b. Registers: 

LDA, LDX en STA 



De instructielengte en de syntax voor AS is precies 
hetzelfde als bij de voor gaande methode alleen ver- 
vangen we de X (of x) door een Y (of y). 



Voorbeeld: 
Instructie 
LDX OFFSET, Y 



Memory 

BE 34 12 (OFFSET tabel 
start op $1234) 



Welnu, even de grijze massa in beweging en je weet 
gelijk hoe deze instructie groep te werk gaat. Ze ge- 
ven de postbode een adres in de wijk Zero Page, die 
fietst (alweer) naar vriend X, gebruikt z'n zakjapan- 
ner en weet het huisadres van de gevraagde sjam- 
petter. Voordeel van deze methode is dat de 
instructie een byte korter is, nadeel is dat de tabel 
alleen in Zero Page kan staan. Alle instructies die 
opgesomd zijn bij Absolute,X kunnen ook gebruikt 
worden met deze adresseermethode en nu wel met 
STY (how come, mr. Rockwell?) Schematisch is dit 
verhaal hetzelfde als bij Absolute,X mits je in ge- 
dachten houdt dat ADRES nu ergens tussen $0000 
en $00FF moet liggen. De instructielengte is 2 bytes 
en de AS syntax is precies hetzelfde als bij Absolu- 
te,X alleen moet de operand nu 8 bits zijn. 



Voorbeeld: 
Instructie 
STX DATA,Y 



10. Relative 



Memory 
96 40 (DATA begint bij 



Bij de 6502 wordt deze adresseermethode alleen ge- 
bruikt voor de offset van de branches. De data ach- 
de opcode wordt gebruikt om de 



ter 

programmateller ten opzichte van de huidige waar- 
de van de programmateller of PC (zie ook deel 1) te 
gaan verplaatsen. Het komt er dus op neer dat er 
een sprong wordt uitgevoerd van -128 tot +127 
t.o.v. de huidige locatie. De 6502 kent totaal 8 ver- 
schillende branches die alle aan de hand van een bit 
van het statusregister P wel of niet werken. De con- 
i dus. Dat zijn: 



a. Branches die de C-flag testen: 

BCC, BCS 

b. Branches die de Z-flag testen: 

BEQ, BNE 

c. Branches die de N-flag testen: 

BMI, BPL 

d. Branches die de V-flag testen: 

BVC, BVS 

Het zelf berekenen van zo'n relatieve branch ge- 
beurt vanaf de locatie waar de offset moet komen te 
staan. Voorwaartse referenties zijn eenvoudig uit te 
tellen. Moeten we bijvoorbeeld over een JMP in- 
structie heen 'branchen' dan is de offset 3 (immers 
een JMP is 3 bytes lang) (zie figuur 3). 



BNE 3 

JM= ELDERS 



Fig. 3 
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Systemen 



Een terugwaartste referentie is wat lastiger omdat 
we nu het two's complement moeten berekenen, bo- 
vendien moet de lengte van de branch zelf t.w. 2 by- 
tes ook worden meegeteld. Programeren we nu de 
kortste oneindige programmaloop die mogelijk is 
dan moeten we dus als offset -2 opgeven. In 2's com- 
plement wordt dat: 



2 = 00000010 
11111101 

00000001 
11111110 



(l's complement, alle bits 
inverteren) 

( + 1) 
= $FE 



JMP 



A1 (low) 



A1 Jlitfl) 



A2 (low) 



A2 (hicri) 



PC (high) 



PC (low) 



Ons superkorte nutteloze processortijd verspillende 
programma wordt dus zoals in figuur 4 afgedrukt is. 



CLC 

BCC $FE 



Initialisatie 

and start 

loop ad infinitum 



Fig. 4 

Het effectieve bereik van een branch is gegeven 
door de 8 bits signed offset dus -128 tot + 127. Om- 
dat de instructie zelf 2 bytes lang is wordt dat dus - 
128 + 2 = -126 (terug) tot 127 + 2 = 129 
(vooruit). De instructie lengte is 2 bytes, de AS syn- 
tax is de instructie gevolgd door de relatieve offset 
als je zelf graag relatieve jumps uitrekend, anders 
een verwijzing naar een label binnen het bereik van 
de branch. 



Fig. 5: JMP [A1J; Jump indirect 

Deze instructie is machtig mooi voor gebruik in een 
menu programma, het programma moet dan immers 
aan de hand van de invoer steeds een subprogram- 
maafwerken en dan weer terugkomen in de hoofd- 
lus. Dat kan natuurlijk als volgt: 

; keuze zit in A (0...X) 

CMP #0 ; was het keuze 0? 

BNE + 6 ; nee, ga door 

JSR KEUZE0 ; ja, doe subroutine 

JMP LOOP 

CMP #'1 ; keuze 1? 

BNE +6 

JSR KEUZE1 

JMP LOOP 

Heel vervelend programeren is dat, bovendien heeft 
het als groot nadeel dat het niet eenvoudig is uit te 
breiden. Het programma wordt immers bij iedere 
keuze 10 bytes langer. Het is eigenlijk alleen bruik- 
baar bij relatief weinig mogelijkheden. En last but 
not least, iedereen kan dit zo schrijven. De Echte 
Programmeur doet het met tabellen, en wel als 
volgt: 



Voorbeeld: 

Instructie Memory 
BNE 3 DO 03 

11. Indirect 

Dit is een buitenbeentje (of stiefkind) bij de 6502. 
De methode werkt als volgt, de postbode krijgt een 
adres door van de processor, hij fietst erheen en 
krijgt op dat adres te horen waar het pakketje naar 
toe moet (of moet worden opgehaald). Algemeen: 
de operand wijst naar adres Al dat op zijn beurt 
wijst naar adres A2 waar de data staat. Bij de 6502 
wordt deze methode alleen gebruikt voor de JMP 
instructie. In figuur 5 is de indirecte methode sche- 
matisch weergegeven. 



; keuze zit in A (0...X) 
ASLA ; A = A * 2 

TAX ; zet A in X 

LDA KEUZE,0 ; haal subroutine adres 

(low) 

STA ADRES 

LDA KEUZE + 1,X ; en high part 
STA ADRES + 1 

JSR DO IT ; doe geselecteerde 

functie 

JMP LOOP ; en voor de volgende keer 
DO_IT JMP [ADRES] ;ga- 

KEUZE FDB KEUZE0,KEUZE1,KEUZE2,.. 
ADRES 
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